object FAssignConsToPatient: TFAssignConsToPatient
  Left = 0
  Top = 0
  BorderStyle = bsToolWindow
  ClientHeight = 244
  ClientWidth = 778
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -19
  Font.Name = 'Segoe UI Light'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 25
  object AdvPanel1: TAdvPanel
    Left = 0
    Top = 0
    Width = 778
    Height = 208
    Align = alClient
    BevelOuter = bvNone
    Color = 16643823
    Enabled = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    UseDockManager = True
    Version = '2.2.0.2'
    BorderColor = 13087391
    Caption.Color = 16643823
    Caption.ColorTo = 15784647
    Caption.Font.Charset = DEFAULT_CHARSET
    Caption.Font.Color = 5978398
    Caption.Font.Height = -11
    Caption.Font.Name = 'Tahoma'
    Caption.Font.Style = []
    Caption.GradientDirection = gdVertical
    Caption.Indent = 2
    Caption.ShadeLight = 255
    CollapsColor = clNone
    CollapsDelay = 0
    ColorTo = 15784647
    ShadowColor = clBlack
    ShadowOffset = 0
    StatusBar.BorderColor = 16643823
    StatusBar.BorderStyle = bsSingle
    StatusBar.Font.Charset = DEFAULT_CHARSET
    StatusBar.Font.Color = 5978398
    StatusBar.Font.Height = -11
    StatusBar.Font.Name = 'Tahoma'
    StatusBar.Font.Style = []
    StatusBar.Color = 16643823
    StatusBar.ColorTo = 15784647
    StatusBar.GradientDirection = gdVertical
    Styler = AdvPanelStyler1
    Text = ''
    FullHeight = 200
    object cxGroupBox1: TcxGroupBox
      Left = 16
      Top = 8
      Caption = 'Assign Cons to Patient'
      TabOrder = 0
      Height = 193
      Width = 745
      object AdvPanel2: TAdvPanel
        Left = 2
        Top = 18
        Width = 741
        Height = 173
        Align = alClient
        BevelOuter = bvNone
        Color = 16643823
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Tahoma'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        UseDockManager = True
        Version = '2.2.0.2'
        BorderColor = 13087391
        Caption.Color = 16643823
        Caption.ColorTo = 15784647
        Caption.Font.Charset = DEFAULT_CHARSET
        Caption.Font.Color = 5978398
        Caption.Font.Height = -11
        Caption.Font.Name = 'Tahoma'
        Caption.Font.Style = []
        Caption.GradientDirection = gdVertical
        Caption.Indent = 2
        Caption.ShadeLight = 255
        CollapsColor = clNone
        CollapsDelay = 0
        ColorTo = 15784647
        ShadowColor = clBlack
        ShadowOffset = 0
        StatusBar.BorderColor = 16643823
        StatusBar.BorderStyle = bsSingle
        StatusBar.Font.Charset = DEFAULT_CHARSET
        StatusBar.Font.Color = 5978398
        StatusBar.Font.Height = -11
        StatusBar.Font.Name = 'Tahoma'
        StatusBar.Font.Style = []
        StatusBar.Color = 16643823
        StatusBar.ColorTo = 15784647
        StatusBar.GradientDirection = gdVertical
        Styler = AdvPanelStyler1
        Text = ''
        FullHeight = 200
        object Label1: TLabel
          Left = 24
          Top = 8
          Width = 45
          Height = 13
          Caption = 'Batch Nr.'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clRed
          Font.Height = -11
          Font.Name = 'Tahoma'
          Font.Style = []
          ParentFont = False
        end
        object Label2: TLabel
          Left = 24
          Top = 35
          Width = 37
          Height = 13
          Caption = 'Patient '
        end
        object Label3: TLabel
          Left = 24
          Top = 62
          Width = 22
          Height = 13
          Caption = 'Item'
        end
        object Label4: TLabel
          Left = 24
          Top = 89
          Width = 32
          Height = 13
          Caption = 'Doctor'
        end
        object Label10: TLabel
          Left = 24
          Top = 116
          Width = 23
          Height = 13
          Caption = 'Date'
        end
        object Label11: TLabel
          Left = 24
          Top = 143
          Width = 22
          Height = 13
          Caption = 'Time'
        end
        object cxDBTextEdit1: TcxDBTextEdit
          Left = 112
          Top = 5
          DataBinding.DataField = 'his_item_encounter_id'
          DataBinding.DataSource = DMItems.DShis_items_encounter_cons
          Enabled = False
          TabOrder = 0
          Width = 297
        end
        object cxDBLookupComboBox1: TcxDBLookupComboBox
          Left = 112
          Top = 32
          DataBinding.DataField = 'encounter_id'
          DataBinding.DataSource = DMItems.DShis_items_encounter_cons
          Properties.KeyFieldNames = 'encounter_nr'
          Properties.ListColumns = <
            item
              FieldName = 'person'
            end>
          Properties.ListSource = DMPerson.DShis_assign_encounter_person_all
          TabOrder = 1
          Width = 297
        end
        object cxDBLookupComboBox2: TcxDBLookupComboBox
          Left = 112
          Top = 59
          DataBinding.DataField = 'item_id'
          DataBinding.DataSource = DMItems.DShis_items_encounter_cons
          Properties.KeyFieldNames = 'item_id'
          Properties.ListColumns = <
            item
              FieldName = 'item_code'
            end>
          Properties.ListSource = DMItems.DShis_cons_items
          TabOrder = 2
          Width = 297
        end
        object cxDBLookupComboBox3: TcxDBLookupComboBox
          Left = 112
          Top = 86
          DataBinding.DataField = 'first_k'
          DataBinding.DataSource = DMItems.DShis_items_encounter_cons
          Properties.KeyFieldNames = 'nr'
          Properties.ListColumns = <
            item
              FieldName = 'name'
            end>
          Properties.ListSource = DMPerson.DShis_person_doctor
          TabOrder = 3
          Width = 297
        end
        object cxDBDateEdit1: TcxDBDateEdit
          Left = 112
          Top = 113
          DataBinding.DataField = 'send_date'
          DataBinding.DataSource = DMItems.DShis_items_encounter_cons
          TabOrder = 4
          Width = 121
        end
        object cxDBTimeEdit1: TcxDBTimeEdit
          Left = 112
          Top = 140
          DataBinding.DataField = 'send_time'
          DataBinding.DataSource = DMItems.DShis_items_encounter_cons
          TabOrder = 5
          Width = 121
        end
      end
    end
  end
  object DBAdvGlowNavigator1: TDBAdvGlowNavigator
    Left = 0
    Top = 208
    Width = 778
    Height = 36
    Hint = 
      'First record'#13'Prior record'#13'Next record'#13'Last record'#13'Insert record'#13 +
      'Delete record'#13'Edit record'#13'Post edit'#13'Cancel edit'#13'Refresh data'#13'Fin' +
      'd record'#13'Set bookmark'#13'Goto bookmark'
    DataSource = DMItems.DShis_items_encounter_cons
    VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbEdit, nbPost, nbCancel, nbRefresh]
    Align = alBottom
    Appearance.ColorChecked = 16111818
    Appearance.ColorCheckedTo = 16367008
    Appearance.ColorDisabled = 15921906
    Appearance.ColorDisabledTo = 15921906
    Appearance.ColorDown = 16111818
    Appearance.ColorDownTo = 16367008
    Appearance.ColorHot = 16117985
    Appearance.ColorHotTo = 16372402
    Appearance.ColorMirrorHot = 16107693
    Appearance.ColorMirrorHotTo = 16775412
    Appearance.ColorMirrorDown = 16102556
    Appearance.ColorMirrorDownTo = 16768988
    Appearance.ColorMirrorChecked = 16102556
    Appearance.ColorMirrorCheckedTo = 16768988
    Appearance.ColorMirrorDisabled = 11974326
    Appearance.ColorMirrorDisabledTo = 15921906
    DeleteDisabled = False
    InsertDisabled = False
    GlyphCustomSize = 0
    Orientation = noHorizontal
    TabOrder = 1
    OnBtnPrior = DBAdvGlowNavigator1BtnPrior
    OnBtnNext = DBAdvGlowNavigator1BtnNext
    OnBtnFirst = DBAdvGlowNavigator1BtnFirst
    OnBtnLast = DBAdvGlowNavigator1BtnLast
    OnBtnInsert = DBAdvGlowNavigator1BtnInsert
    OnBtnEdit = DBAdvGlowNavigator1BtnEdit
    OnBtnCancel = DBAdvGlowNavigator1BtnCancel
    OnBtnPost = DBAdvGlowNavigator1BtnPost
    OnBtnRefresh = DBAdvGlowNavigator1BtnRefresh
    Version = '1.1.4.0'
  end
  object AdvPanelStyler1: TAdvPanelStyler
    Tag = 0
    Settings.AnchorHint = False
    Settings.BevelInner = bvNone
    Settings.BevelOuter = bvNone
    Settings.BevelWidth = 1
    Settings.BorderColor = 13087391
    Settings.BorderShadow = False
    Settings.BorderStyle = bsNone
    Settings.BorderWidth = 0
    Settings.CanMove = False
    Settings.CanSize = False
    Settings.Caption.Color = 16643823
    Settings.Caption.ColorTo = 15784647
    Settings.Caption.Font.Charset = DEFAULT_CHARSET
    Settings.Caption.Font.Color = 5978398
    Settings.Caption.Font.Height = -11
    Settings.Caption.Font.Name = 'Tahoma'
    Settings.Caption.Font.Style = []
    Settings.Caption.GradientDirection = gdVertical
    Settings.Caption.Indent = 2
    Settings.Caption.ShadeLight = 255
    Settings.Collaps = False
    Settings.CollapsColor = clNone
    Settings.CollapsDelay = 0
    Settings.CollapsSteps = 0
    Settings.Color = 16643823
    Settings.ColorTo = 15784647
    Settings.ColorMirror = clNone
    Settings.ColorMirrorTo = clNone
    Settings.Cursor = crDefault
    Settings.Font.Charset = DEFAULT_CHARSET
    Settings.Font.Color = clBlack
    Settings.Font.Height = -11
    Settings.Font.Name = 'Tahoma'
    Settings.Font.Style = []
    Settings.FixedTop = False
    Settings.FixedLeft = False
    Settings.FixedHeight = False
    Settings.FixedWidth = False
    Settings.Height = 120
    Settings.Hover = False
    Settings.HoverColor = clNone
    Settings.HoverFontColor = clNone
    Settings.Indent = 0
    Settings.ShadowColor = clBlack
    Settings.ShadowOffset = 0
    Settings.ShowHint = False
    Settings.ShowMoveCursor = False
    Settings.StatusBar.BorderColor = 16643823
    Settings.StatusBar.BorderStyle = bsSingle
    Settings.StatusBar.Font.Charset = DEFAULT_CHARSET
    Settings.StatusBar.Font.Color = 5978398
    Settings.StatusBar.Font.Height = -11
    Settings.StatusBar.Font.Name = 'Tahoma'
    Settings.StatusBar.Font.Style = []
    Settings.StatusBar.Color = 16643823
    Settings.StatusBar.ColorTo = 15784647
    Settings.StatusBar.GradientDirection = gdVertical
    Settings.TextVAlign = tvaTop
    Settings.TopIndent = 0
    Settings.URLColor = clBlue
    Settings.Width = 0
    Style = psOffice2010Blue
    Left = 680
    Top = 24
  end
end
